home *** CD-ROM | disk | FTP | other *** search
/ Your Mobile: Alcatel / Alcatel 2005.iso / Alcatel One Touch 715 / data1.cab / Creation_Studio_Data / csGraph.dxr / 00034_btn zoom.ls < prev    next >
Encoding:
Text File  |  2002-06-21  |  359 b   |  14 lines
  1. property monSens
  2. global gzoom, gZoomFacteur
  3.  
  4. on getPropertyDescriptionList me
  5.   return [#monSens: [#comment: "sens du zoom", #format: #integer, #default: 1, #range: [-1, 1]]]
  6. end
  7.  
  8. on mouseUp me
  9.   listezoom = [1, 2, 5, 10]
  10.   gZoomFacteur = max(min(listezoom.count, gZoomFacteur + me.monSens), 1)
  11.   gzoom = listezoom[gZoomFacteur]
  12.   sendAllSprites(#Resize)
  13. end
  14.